﻿Namespace Sigortali.Evlenme
	Module Functions

		Function Liste(ByVal Process As Token, ByVal kimlik As String) As Recordset
			Q("select *")
			Q("from ssdmerkez.dbo.sevlenme a")
			Q("where a.kimlik = @kimlik order by a.murtar")
			Return Process.OpenSQL("*", kimlik)
		End Function

	End Module
End Namespace
